/*
 *	@file	fld_trhouse_st.c
 *	@brief	トレーナーハウス　常駐ソース
 *	@author	Miyuki Iwasawa
 *	@date	09.03.26
 *
 *	このソースは特別にトレーナーハウスセーブデータの全構造体メンバを公開します
 *	ここで公開していても、他のソースに不用意に公開は禁止
 */
#include "common.h"

#include "fieldsys.h"

#include "system/mystatus.h"
#include "poketool/poke_tool.h"

#include "field_subproc.h"
#include "field/field.h"
#include "field/situation_local.h"
#include "field/script.h"
#include "field/syswork.h"
#include "field/fld_bgm.h"
#include "fieldmap.h"
#include "map_attr.h"
#include "zonedata.h"
#include "map_tool.h"
#include "scr_tool.h"
#include "scrcmd_def.h"
#include "sysflag.h"
#include "field_subproc.h"
#include "ev_mapchange.h"

#include "field/evwkdef.h"
#include "fielddata/script/savework.h"

#include "savedata/tr_house.h"
#include "savedata/tr_house_data.h"	//include許可制

#include "msgdata/msg.naix"
#include "msgdata/msg_tr_house.h"

#include "fld_trhouse.h"

/**
 *	@brief	指定IDのトレーナーデータが有効かどうかを返すスクリプトコマンド
 *
 *	内部でOBJCHRWORK1-10までの設定も行う
 */
BOOL EvCmdTrHouseStIsEnableTrainer( VM_MACHINE * core )
{
	u16	id = VMGetWorkValue(core);
	u16* ret_wk = VMGetWork(core);
	u16* obj_wk = GetEventWorkAdrs( core->fsys, OBJCHRWORK1+id );

	FIELDSYS_WORK* fsys = core->fsys;
	TR_HOUSE_SAVE* th_save = SaveData_GetTrHouseSave(fsys->savedata);

	*ret_wk = TrHouseTrainer_IsEnable(&th_save->trainer[id]);

	if(*ret_wk){
		*obj_wk = th_save->trainer[id].player.obj_code;
	}else{
		*obj_wk = 0;
	}
	return 0;
}